Apple Reference & Presen…rary 8 (Internal Edition)/Apple R&P Lib Internal v8.0.iso/5-Fonts & Software/Demo Software/Aldus PageMaker 4.0 Demo/Aldus/APDs/TI OmniLaser 2115.apd

Text File | 1990-05-16 | 9KB | 231 lines

@Comment: "TI OmniLaser 2115.apd" for Texas Instruments OmniLaser 2115 printer.
@Comment: Aldus Printer Description (APD) file
@Comment:     $Revision:   3.3  $
@Comment:     $Date:   25 Feb 1988 17:01:08  $
@Comment: This APD produced for use with Aldus PageMaker 4.0 or earlier version.
@Comment: Keyword values are currently limited to 255 characters in length.

@FormatVersion: "1.0"
@Product: "(OmniLaser)"
@PSVersion: "(45.0)"
@PSRevision: "1"

@Resolution: "300 300"

@AllowComments: "true"
@AllowVMQuery: "true"

@Comment:  "FreeVM" value is equivalent to vmstatus "maximum" minus "used" values
@Comment: Limit VM when printing to file, to not exceed save-level limit for downloaded fonts:
@FreeVM: "350000"
@Comment: Actual value is @FreeVM: "576000"
@WorkingMem: "25000"
@AldusHeaderMem: "34000"
@Comment: Example of declaration of a downloadable font's memory requirement:
@Comment: @FontMem "Benjo-Light": "82600"

@Comment: PatchFile is sent right after %%EndComments, AldusPatchFile right before %%EndSetup.
@PatchFile: "userdict /AldusDict known {(A previous version PageMaker header is loaded.) = flush} if"
@AldusPatchFile: "statusdict begin jog end"
@ExitServer: "serverdict begin exitserver "
@Password: "0"

@DefaultScreenFreq: "50"
@DefaultScreenAngle: "54"
@DefaultScreenProc: "{abs exch abs 2 copy add 1 gt
{1 sub dup mul exch 1 sub dup mul add 1 sub} {dup mul exch dup mul add 1 exch sub}ifelse}"
@End

@ScreenFreq: ""
@ScreenAngle: ""
@ScreenProc: ""

@InvertScreenProc: "{abs exch abs 2 copy add 1 gt {1 sub dup mul exch 1 sub dup mul
add 1 exch sub}{dup mul exch dup mul add 1 sub} ifelse}"
@End
@Transfer: ""
@InvertTransfer: "{1 exch sub}"

@NormalizedTransfer: "{
mark
1.0 1.0 .84 .77 .69 .61 .54 .47 .40 .32 .24 .0
counttomark dup 3 add -1 roll exch
2 sub mul dup floor cvi
dup 3 1 roll sub
exch dup
3 add index exch 2 add index dup
4 1 roll
sub mul add
counttomark 1 add 1 roll
cleartomark
} bind"
@End

@InvertNormalizedTransfer: "{
mark
.0 .0 .06 .1 .28 .48 .56 .68 .82 .9 .98 1.0
counttomark dup 3 add -1 roll exch
2 sub mul dup floor cvi
dup 3 1 roll sub
exch dup
3 add index exch 2 add index dup
4 1 roll
sub mul add
counttomark 1 add 1 roll
cleartomark
} bind"
@End

@Comment: Assumes a file system (actually implemented as cartridges).
@?FontList: "save /SC 100 string def FontDirectory{pop = flush}forall
(fonts/*){dup length 6 sub 6 exch getinterval = flush}SC filenameforall(*)= flush restore"
@End
@Comment:  @?FontQuery should look at cartridges also.
@?FontQuery: "FontDirectory exch known {1}{0} ifelse = flush"
@?VMStatus: "vmstatus 3 -1 roll dup 10 gt
{3 1 roll exch pop dup} {3 1 roll} ifelse == == == flush"
@?OutputOrder: ""

@Comment: PageSize options appear in the "Paper" list box in the Printer-specific dialog.
@DefaultPageSize:     "Letter"
@PageSize Letter:     "letter"
@PageSize Legal:     "legal"
@PageSize A4:         "a4"

@PaperTray Letter:     "statusdict begin lettertray end"
@PaperTray Legal:     "statusdict begin legaltray end"
@PaperTray A4:         "statusdict begin a4tray end"

@Comment: PageRegion gives the printable area of each paper option.
@PageRegion Letter:     "19.80 15.84 592.20 776.16"
@PageRegion Legal:         "18.00 18.00 594.00 990.00"
@PageRegion A4:         "18.00 17.72 577.27 824.17"

@Comment: PaperDimension gives the total paper size of each option.
@PaperDimension Letter:     "612 792"
@PaperDimension Legal:         "612 1008"
@PaperDimension A4:         "595.28 841.89"

@Comment: Setting the "papertray" value directly selects an input slot
@Comment:    without resetting the image area;
@Comment:    Using the "setpapertray" operator resets the image area to
@Comment:    correspond to whatever tray is in the input slot selected.
@DefaultInputSlot: "Upper"
@Comment: In the TI "/papertray 1 def" does not select correct input slot position, and
@Comment:     "1 setpapertray" does not reselect image area based on selected tray's size
@InputSlot Upper: "statusdict begin 0 setpapertray end"
@InputSlot Lower: "statusdict begin 1 setpapertray end"

@DefaultOutputOrder: "facedown"

@ManualFeed: "none"

@DefaultFont: "Courier"
@Font "Times-Roman": "Standard" "(001.000)"
@Font "Times-Bold": "Standard" "(001.000)"
@Font "Times-Italic": "Standard" "(001.000)"
@Font "Times-BoldItalic": "Standard" "(001.000)"
@Font "Helvetica": "Standard" "(001.000)"
@Font "Helvetica-Bold": "Standard" "(001.000)"
@Font "Helvetica-Oblique": "Standard" "(001.000)"
@Font "Helvetica-BoldOblique": "Standard" "(001.000)"
@Font "Courier": "Standard" "(001.000)"
@Font "Courier-Bold": "Standard" "(001.000)"
@Font "Courier-Oblique": "Standard" "(001.000)"
@Font "Courier-BoldOblique": "Standard" "(001.000)"
@Font "Symbol": "Standard" "(001.000)"


@Comment: The order of occurrence determines the order of parsing; put general messages last.
@Comment: PrinterWarning beeps and displays the translation string in the status line.

@PrinterWarning    "%%[ PrinterError: paper \where\ misfeed\lost\ ]%%"
                : "Printer “^2” needs attention: paper jam."
@PrinterWarning    "%%[ PrinterError: \Reason\ ]%%"
                : "Printer “^2” needs attention: \Reason\."

@PrinterWarning    "\s\status: PrinterError: paper \where\ misfeed\lost\"
                : "Printer “^2” needs attention: paper jam."
@PrinterWarning    "\s\status: PrinterError: \Reason\; source: \source\"
                : "Printer “^2” needs attention: \Reason\."

@ParameterReason    "no paper tray" :         "no paper tray"
@ParameterReason    "out of paper" :         "out of paper"
@ParameterReason    "cover open" :             "cover open"
@ParameterReason    "warming up" :             "warming up"
@ParameterReason    "service call" :         "service call"
@ParameterReason    "resetting printer" :     "resetting printer"
@ParameterReason    "cover open" :             "cover open"
@ParameterReason    "timeout, clearing printer" : "timeout"
@ParameterReason    "timeout" :             "timeout"
@ParameterReason    "manual feed timeout" : "manual feed timeout"
@ParameterReason    "no toner cartridge" :     "no toner cartridge"
@ParameterReason    "-- Cover open" :         "cover open"
@ParameterReason    "Call key operator" :     "call key operator"
@ParameterReason    " Set Paper Stack" :     "adjust size of output bin"


@Comment: the following are unusual messages produced by TI OmniLasers:
@PrinterWarning "\s\status:  Set Paper Stack; source: \source\"
                : "Printer “^2” needs attention: adjust size of output bin."
@PrinterWarning "\s\status:   Supply Paper; source: \source\"
                : "Printer “^2” needs attention: out of paper."
@PrinterWarning "\s\status: Check Paper Tray; source: \source\"
                : "Printer “^2” needs attention: check paper tray."
@PrinterWarning "\s\status:     Add Toner; source: \source\"
                : "Printer “^2” needs attention: add toner."

@Comment: PrinterMessage displays the translation string in the status line.
@PrinterMessage     "job: \username\; document: \jobname\; status: \Status\; source: \source\"
                : "User: \username\;  document: \jobname\;  status: \Status\."
@PrinterMessage     "job: \jobname\; status: \Status\; source: \source\"
                : "Document: \jobname\;  status: \Status\."
@PrinterMessage     "status: \Status\; source: \source\"
                : "Status: \Status\."
@PrinterMessage     "\Font1\ not found, using \Font2\"
                : "Font \Font1\ is not found on ^2, substituting \Font2\"

@ParameterStatus     "idle"    : "idle"
@ParameterStatus     "busy"    : "processing job"
@ParameterStatus     "waiting"    : "preparing data"
@ParameterStatus    "initializing"    : "warming up"
@ParameterStatus    "printing test page" : "printing test page"
@ParameterStatus    "paper entry misfeed" : "paper entry misfeed"

@ParameterTray        "letter":    "Letter"
@ParameterTray        "legal":     "Legal"
@ParameterTray        "a4":         "A4"

@Comment: a null translation string causes no message to display.
@PrinterMessage    "%%[ exitserver: permanent state may be changed ]%%"
                : ""
@PrinterMessage    "%%[ Flushing: rest of job (to end-of-file) will be ignored ]%%"
                : ""

@Comment: Parameter substitution of printer name for "^2" is not allowed in "...Alert" messages!
@Comment: PrinterWarningAlert displays translation string in a warning-alert box and continues.
@PrinterWarningAlert "A previous version PageMaker header is loaded."
    : "Printer performance may improve if you do not print with PageMaker version 1.2 on this net."

@Comment: PrinterErrorAlert displays translation string in a stop-alert box and aborts printing.
@PrinterErrorAlert    "%%[ Error: rangecheck; OffendingCommand: \Tray\tray ]%%"
                : "Please place the \Tray\ paper tray in your printer, and print again."
@Comment: -seems to be a bug in ver 45.0 roms for TI:
@PrinterErrorAlert    "%%[ Error: typecheck; OffendingCommand: get ]%%"
                : "Please place the legal paper tray in your printer, and print again."
@PrinterErrorAlert    "%%[ Error: \fonterror\; OffendingCommand: fontdownload ]%%"
                : "The font being downloaded has not been initialized for this printer."
@PrinterErrorAlert    "%%[ Error: VMerror; OffendingCommand: \operator\ ]%%"
                : "Printer memory exceeded; turn printer off and on, or print smaller sections of the document."
@PrinterErrorAlert    "%%[ Error: timeout; OffendingCommand: \operator\ ]%%"
                : "The printer had to wait too long, and went on to the next job; try again."
@PrinterErrorAlert    "%%[ Error: \error\; OffendingCommand: \operator\ ]%%"
                : "Cannot print due to PostScript error: “\error\,” in command: “\operator\.”"
@PrinterErrorAlert    "Fatal system error \error\"
                : "The printer has encountered an error. Simplify your document or try again."